//Next Stop Perdition by JayPro via Checkman and Roger Bigod
//8-31-17


Aspc=1

A0="pi+rnd(.628)"
A1="2.5+rnd(.75)"
A2="3+rnd(.9)"
A3="1.2+rnd(2.4)"
A4=".75*rnd(1.5)"
A5="10*sqr(rnd(1.1))"


D0=" sin(wrap(y*sin(a3+cos(r)) * (a3+trwv(theta)) ))  * a2  "
D1=" trwv(r/x)-(wrap(y*sin(1+cos(r))*(1+trwv(x*pi)) ))*a0   "
D2="  trwv(d0-y/x) * a1" 		
D3="  flip(d1/sin(theta)) * a1"
D4="trwv( (d2+d3)*a2)"
D5="trwv( (d2-d3)*a2)"
D6=" sin(d2) - cos(d4) +d2 + atan(d4)*a3 "
D7=" cos(d3) + abs(d4)- d3 + atan(d5)*a3"
D8=" wrap(d7-sin(d6)+abs(d4)-cos(d5))*a3*d2"
D9=" wrap(d7+cos(d6)-sin(d2)-atan(d3))*a3*d3"
D10="flip( sgn( wrap( abs(y/x)*a5)-a4)) * flip(sgn(a4-wrap(abs(r/x)*a5))) * flip(sgn(wrap(abs(r/x)*a5)-.25))*flip(sgn(a4-wrap(abs(y/x)*a5)))   "
D11="abs(trwv(d10/1+sin(theta)))" 


srcR="(-pos(D9*(a3+cos(d9))))*d10+d11*cos(r*a4)"
 srcT="(pos(D8*(a3+sin(d8))))*d10+d11*sin(theta*a4)*d10+d11*sin(y/x*.1)"

Vers=300


